Читает полную строку начиная с текущего указателя(до символа новой строки, но не включая его) из файла TextStream и возвращает результирующую строку.

object.ReadLine

Параметры
object объект типа TextStream

Пример
Следующий код иллюстрирует использование ReadLine метода:

Function ReadLineTextFile
  Const ForReading = 1, ForWriting = 2
  Dim fso, MyFile
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  MyFile.WriteLine "Hello world!"
  MyFile.WriteLine "The quick brown fox"
  MyFile.Close
  Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForReading)
  ReadLineTextFile = MyFile.ReadLine	' Returns "Hello world!"
End Function